object Fclientes: TFclientes
  Left = 83
  Top = 136
  Align = alCustom
  AutoSize = True
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Cadastro de Clientes'
  ClientHeight = 512
  ClientWidth = 909
  Color = clScrollBar
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'System'
  Font.Style = [fsBold]
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object BitBtn1: TBitBtn
    Left = 456
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Incluir'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 532
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Alterar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 608
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Excluir'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 684
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Relat'#243'rio'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object BitBtn5: TBitBtn
    Left = 835
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Sair'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn5Click
  end
  object Button1: TButton
    Left = 760
    Top = 486
    Width = 75
    Height = 25
    Caption = '&Procurar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 905
    Height = 481
    DataSource = ds_clientes
    TabOrder = 6
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -16
    TitleFont.Name = 'System'
    TitleFont.Style = [fsBold]
  end
  object IBCConnection1: TIBCConnection
    Database = '\brasfort\brasfort.fdb'
    Options.Charset = 'win1252'
    ClientLibrary = 'C:\brasfort\fbclient.dll'
    Username = 'sysdba'
    Password = 'masterkey'
    Server = 'localhost'
    Connected = True
    Left = 216
    Top = 64
  end
  object clientes: TIBCQuery
    Connection = IBCConnection1
    SQL.Strings = (
      'select * from clientes')
    Active = True
    Left = 296
    Top = 80
    object clientesCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object clientesNOME: TStringField
      FieldName = 'NOME'
      Size = 58
    end
    object clientesENDERECO: TStringField
      FieldName = 'ENDERECO'
      Size = 58
    end
    object clientesCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 30
    end
    object clientesUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object clientesCEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object clientesFONE1: TStringField
      FieldName = 'FONE1'
      Size = 10
    end
    object clientesFONE2: TStringField
      FieldName = 'FONE2'
      Size = 10
    end
    object clientesFAX: TStringField
      FieldName = 'FAX'
      Size = 10
    end
    object clientesCNPJ: TStringField
      FieldName = 'CNPJ'
      Size = 14
    end
    object clientesINSCRICAO: TStringField
      FieldName = 'INSCRICAO'
    end
    object clientesCONTATO: TStringField
      FieldName = 'CONTATO'
      Size = 38
    end
    object clientesESTADUAL: TStringField
      FieldName = 'ESTADUAL'
    end
    object clientesEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 58
    end
    object clientesEMPRESA: TStringField
      FieldName = 'EMPRESA'
      Size = 1
    end
    object clientesATIVO: TStringField
      FieldName = 'ATIVO'
      Size = 1
    end
    object clientesPUBLICO: TStringField
      FieldName = 'PUBLICO'
      Size = 1
    end
    object clientesBOLETO: TStringField
      FieldName = 'BOLETO'
      Size = 1
    end
    object clientesPORTARIA: TStringField
      FieldName = 'PORTARIA'
      Size = 1
    end
    object clientesIR: TFloatField
      FieldName = 'IR'
    end
    object clientesPIS: TFloatField
      FieldName = 'PIS'
    end
    object clientesCS: TFloatField
      FieldName = 'CS'
    end
    object clientesCOFINS: TFloatField
      FieldName = 'COFINS'
    end
    object clientesCCUSTO0: TStringField
      FieldName = 'CCUSTO0'
      Size = 3
    end
    object clientesCCUSTO1: TStringField
      FieldName = 'CCUSTO1'
      Size = 3
    end
    object clientesRETINSS: TStringField
      FieldName = 'RETINSS'
      Size = 1
    end
    object clientesPAIS: TIntegerField
      FieldName = 'PAIS'
    end
    object clientesIBGE: TIntegerField
      FieldName = 'IBGE'
    end
    object clientesMUNICIPIO: TIntegerField
      FieldName = 'MUNICIPIO'
    end
    object clientesGPS: TStringField
      FieldName = 'GPS'
      Size = 1
    end
    object clientesPAGINA: TStringField
      FieldName = 'PAGINA'
      Size = 80
    end
    object clientesCONTA: TStringField
      FieldName = 'CONTA'
      Size = 6
    end
    object clientesBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 30
    end
    object clientesNUMERO: TIntegerField
      FieldName = 'NUMERO'
    end
  end
  object ds_clientes: TIBCDataSource
    DataSet = clientes
    Left = 424
    Top = 64
  end
end
